*define
nsa
;ftHg
defaultfont "lr SVbN"

transmode alpha

effect 2,10,2000

effectblank 500

windoweffect 10,500

;Q[
caption "~Ɂ@-after after holy night-"

savename "Z[u","[h","f[^"

;ENbNj[
rmenu "Z[u",save,"[h",load,"z",lookback,"",windowerase,"^Cgʂɖ߂",reset,"I",end

;o[W
versionstr "~ Ver.1.01"," ɂ񖡑X"
;\x
killmenu 4

game

*start

setwindow 8,32,24,18,26,26,0,2,15,1,1,#ffffff,0,0,639,479

rmode 0

*first

;^Cgʕ\
bg "image\title.jpg",10,2000
lsp 8,"image\titlerogo.bmp",50,90

print 10,2000

*reset

;j[\
locate 18,7
select "n߂",*hazime,"",*tuduki,"I",*owaru

*tuduki
systemcall load
goto *reset

*owaru
end

*hazime

setwindow 8,32,24,18,26,26,0,2,15,1,1,#999999,0,0,639,479

rmode 1

vsp 8,0

bg black,10,5000

bg "image\kouen.jpg",2

bgm "sound\yumemi.mid"


@ߐ[B@
@ِN٘ݓIÁCɉISVֈB\
@XvVW֓VB@
@{Ce{ː\œIC@
@V[CFI]S᳁B@
@BLݓI߈i]C˘ޘ哧ҌB\
@󒆉MIQB@
@@ØCٓINPCِI݋󒆉ƁB\
@e^sv́B@
@ʘX撆ICVLґwq@
@ޑ݁C{˘ݓIw۔}CꓞeCߗ֜R~B\
@VOCĖvLlB@
@{ː䏊AIÁC@
@BƍݍC엹hɉSI܁B\
@䘸pJߓIܗzo\Cv\᳁B@
@ܗ^܍͎wIفCePP_TOB\
@VϑCQOOSN瑦}B@
@ΑRsCA\ߘѕsmiLI[ڐB\
uv@
@~LICFIR󒆁B\
uYCΕΗvݑޓqˋv@
@vLlIffЁB\
@vB@
@Ca݉䐳ݓIl旹ˁB@
@˓IRC{sNIAqѕfIB\
@֔@CWa旹ˁB@
@ݑzC^忎dB\
@kvȑOADC꒼ғIVB@
@RᐬݑސSC䘠YAv\EZsT΋B\
@zۈ꘢Җ{\ݓICkIB@
@z۔@giI阴Cp̖sIB\
@ݕŗvg̝I⒆Cg̎RRn吘ǗNB@
ucccꑣ✒`v@
@AZTNȘI{OCꕽmIoICΗeC盤sQsB\

bg white,2

@aꑊTC@SēIRCߖAߗB@
@NOC㍂꘹IB\

bg "image\tosyo03.jpg",2

bgm "sound\tuki.mid"

@WCȍݔǓ`IǉsmsA㗹ωB\
@ߔV@v{VIw@B@
@VCωIꎟ͉NsB@
@䓖RB\
@ߊωIVԎdfI@C啪{CsӘьwafB@
@꘢A䘢ccݘї{IʍE􊮎f@C򓞉䗹B\
u䐥cnv@
@OotIlC㖼CR@B@
@ڒCgLNgIÁB@
@ߖ琥RIB@
@C꘢A򓞑B\
@ȉ֕snC]g⋋NIgeB\

ld c,"image\game_kyouiti01.bmp",10,1000

u䋩{C@{BӑƁv@
@SCꑜ꘽OϒƁB@
@AݓߘC^IϔsӒn㗹B\
locate 4,7
@߁C֐ؓI[B\

cl c,10,1000

@ǗʏoIӘђOvYsIB@
@SՋCW˜SCmVORIB@
@zIC瓯\zՐIӘсB\
@RIB!w2000AʐlB\
@AC勞ꗈS@B@

ld c,"image\game_kyouiti01.bmp",10,1000

ucIS^Lӎvv@
@ʒϑ@CS厘B\
ucISCꛤHv@
@ŒcIC_ō݊ŏYVICR@SnΗB@

lsp 7,"image\game_kyouiti01_hutu.bmp",225,35
print 10,500

uBʐlspw`̂HxޕSHv\
@ߊhBICۓB\
uYCw`̂HxS@kHshHv\

vsp 7,0:bg white,2

bg "image\tosyo03_ev.jpg",2

@ߔV@Csҍݘ֘sB@
@֊V@Csmsn勞DB\

bg "image\akikyo03.jpg",2

@݊wZᓾ֓VB\
@ϑICߘj́B@
@䘵n]C\ClsXnҍ݋gNB\
@gݑzCsȋ퐥틞I_zB@
@AZFۋNC\ȏo͐I񓚁B\
@A꘢lÍCsAhH\
@L厘\l\FB@
@lVȘlClB@
@lss꘽Cs꘢ƗIlB\
@ȁC^LaȊSsViIlzCs琥RIhH\
@ЎkvȑOCAґdvICD\ґIB@
@䊸fC񋕌B\
@CvsWICTAsꗹB\

bg white,2

bg "image\night.jpg",2

@[IڐCꎟꎟnB@
@~B\
@ė{ڏAvNCȎˌ܏\ȏ㗹B@
@POWڐNCݘYB\
@NvywlCv\aҍ݈NB@
@ȎCAZ呣搯CVaٓvIVB@
@\zCݑlOIVCaҍ݈NB\
@Oʋ󟃊ۙKIC٘ʜgCkAy{B@
@٘ʜgCWsfnSgӘB\
@ŗYՎ蓅^B@
@SzĐC֏L◹pJߓIܗB\
@C㍚RLꖓsߖʗIGB@
@Szs蓅C֗ᒅcoB\
@\蒆IC召גAu萧IXqB@
@VC]\ɋ꘵S΁Cn__oIB\
@sؘܔChhAˊIӔVB\
@䔰ZߘߗߊԓIXqB\
uccBꑣ✒`v@
@ЁCĎ㗹B\

bgm "sound\kibou.mid"

bg "image\kouen.jpg",2

u䗈Bn✒`v@

ld c,"image\game_kyouiti02.bmp",10,1000

@LINB\
ucv@
@䝫NB@
@oݓߗICꗪQ㵓IgeB@
@xVOSB\

;{
lsp 6,"image\game_kyouiti03.bmp",212,34
print 10,500

ucSCݑފI闢gI✒`Iv@
@R@ˑRꐺCg̖ofB\
uVcHv@
@Œpo蘠cgIC˒ӓB@
@IaOCsmsٛ߉ꗹIꖒB\
ucvLӓv@

;
vsp 6,0:lsp 7,"image\game_kyouiti01_hutu.bmp",225,34
print 10,500

uvCvSLnIiC|ɘSIiB@
@cNߘCVVIIB@
@ߘCߊ_AT΁C^BsNv@
@ꑣSCቺB\
uc˕sߘIB@
@ߘCsȘYB@
@TLYsDIݓߕߘBB@C营v@
@ቺB\
usNBv@

;΂
vsp 7,0:lsp 5,"image\game_kyouiti01_warai.bmp",225,34
print 10,500

@IÏCSIΗeWB\
uScBCv@
u]CWv@
uAvהNv@
ucBB݁CהNv\
@lCŌځB@
@w܁CDw\_B@
@EiC\ŘїL|ԐݏNB\
@ݐՏ㑣XqIB\
uv@
uHv@
ucꉺCv@
uVHˑRcYHv@

vsp 5,0:cl c,10,1000

@Δ@CWngB@
@ʑRDlB\
@ՏXqB\
ucDv@
uBmcccv\

;ꕁʊŐU
lsp 7,"image\game_kyouiti01_hutu.bmp",225,34
ld c,"image\game_kyouiti02.bmp",10,1000:print 10,500

@񗵘ICВUB@
@APՒXqIC\KZB\

vsp 7,0:bg white,10,3000

bg "image\game_eve01.jpg",10,5000

uޏޚ]]]BVNv@
uccv@
ucHv\
@]S_YB@
@AZCWL_Q㵓IB\
uABVNB@
WLCXqk׍Bߘc^Ivv\
@NSCNrXqN̉IC䊴IÎxB@
uB߉AUUCv@
uDCߊB@
ߊCR瓞VNCAVNQ`v@

bg "image\kouen.jpg",2

@smKdnCꕎgB\
uAB@
CzhZGv@
@⋓ӐNCҏZI]MB\
uccNԌWqXdvCv@
@SCsmOB@
@CSYhH@

;Cxgbfrgݕ\
bg "image\game_eve02.jpg",10,5000

@ccCV󎗌ᗺB\
@䉺Tn]VB@
@󒆈ˋvLB@
@RCߕŝHnA@ʌݑIHCnƗsB\
uSNCnCVNQ`IÖ]CrDҏYhHv@
@ꝫNCۓB@
uBArDv@
@񓚓B\
@vBߌގCkvȑOA߉r藹B\
@NғIÁAONғIÁCsaNIÖ]꘽B@
@ғIYÁC{splہB\
@NVlőI_ЁCݖՔOar⋒C菶B@
@TSnCsMI_C҉IÖ]B\
!s100
locate 6,6
@\\\]NIC@
locate 1,7
\CRŊWB\



bg white,10,5000

bg black,10,5000

;X^bt[
ld c,"image\staff02.bmp",2

wait 6000

cl c,2:stop




;I̕o
lsp 10,"image\owari.bmp",500,400
print 10,3000
;j[ʂɖ߂
wait 4000
vsp 10,0:bg black,10,4000

goto *start







end
